home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 October / Macworld (1998-10).dmg / Serious Demos / Morpha / 3DO.DXR / 00043_start.ls < prev    next >
Encoding:
Text File  |  1998-07-31  |  354 b   |  11 lines
  1. on beginSprite me
  2.   set the itemDelimiter to ","
  3.   repeat with i = 1 to the number of lines in field "coord"
  4.     set tx to value(item 1 of line i of field "coord")
  5.     set ty to value(item 2 of line i of field "coord")
  6.     set tz to value(item 3 of line i of field "coord")
  7.     set that to 49 + i
  8.     sendSprite(that, #plot, tx, ty, tz)
  9.   end repeat
  10. end
  11.